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PILE FOUNDATION INVESTIGATION 
FOR 
ABUTMENTS AND RETAINING WALLS 


: PROGRAM NUMBER 2704.02 


General 

Given a general description of the problem, the program 
determines the maximum pile load, the vertical pile loads for 
each pile, the horizontal resistance of the pile groups, the 
externally applied horizontal load, the center of gravity of 
the pile group and the eccentricity or distance between the 
center of gravity of the pile group and the location of the 
resultant of all the loads. All important design information 


is listed. 
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HOR «RESIST 
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8028 


ie a enone, 
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WG Oe: 2 VUU eVJUU re) Gay) ZR OMO 
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SY (a5) ee) A 250) 200 e UU Say Shs: 
EXT sHORIZ. GeGe PCG. 
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yas IG) ae Sie 2486 


LP oGo 4 


BeVUU 


2eV00 1 eUU0U 
Peto by P20 
LSD Ut) 30e¢0UU 
111.009 
BAR Wy 
PMAX ROw 1 
5452 ohed 3 


HOReRE Soe EXT «HORI Z . 


PILE GROUP Po ce 
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ROW 2 ROW 3 
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4.91 oa ee 


Lee th aE GORY, 
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ROw 4 ROw 5 
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111-000 


6e000 


The moment of inertia method is used in the investigation. 
The investigation is limited to foundations having a maximum 
of five (5) rows of piles. 

A Fortran listing of the program is attached to define 
engineering formulae, parameters, methods and sequence of 


operations. 


PROCEDURE NO.2704.02 


FORTRAN LISTING 


PILE FOUNDATION INVESTIGATION FOR 


ABUTMENTS AND RETAINING WALLS 


AT=NO.OF 
BT=NO.OF 
CT=NOeOF 
DT=NO.OF 


ET=NO.OF 


PILES. 


PILES if 
PILES IN 
PILES IW 


PILE Ss TN 


BAT=NOceOF ROWS OF 


ROW 


ROW 


ROW 


ROW 


ROW 


BATTER 


2 


3 


PiLes 


PROB=PROBLEM IDENTIFICATION NUMBER 


E1=DISTANCE FROM 


CX=DISTANCE FROM 


DX=DISTANCE FROM 


EX=DISTANCE FROM 


BX=DISTANCE FROM 


E2=DISTANCE 


TOE 


OE 


TO 


TO 


TO 


TO 


TO 


Cob enOW i--Feel 


Cele hOWe greet y 
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Cel sKOW S==FELT 


Peoeieee Cel sRhOW S-=—FEET 


PeGLeneeVWABLCE HORIZONTAL LOAD PER PILE~-=-KIPS 


LI=MUMENT ABOUT TOE---FOOT-KIPS 


EV=JOFAL VERTICAL FORCE---KIPS 


HF1l=TOTAL HORIZONTAL FORCE---KIPS 


wPLLSSPACING BETWEEN PILES IN ROW 1---FEET 


VERT=VERTICAL COMPONENT OF BATTER PILE 


CTR=NOceOF INPUT CARDS FOR ONE PARTICULAR 


PROBLEM AFTER CARD NO.3 


2 READ7sATsBT CT sDT sET s BAT »PROB 
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Pea Diets) CK st A OA SESS POLL 


READ Ts ZJ5ZVsHF1sSP 


PUNCH 7 sPROB 


PUNCH7sPROB 


PUNCH79AT 261 sCTsbDIT 


PUNCHT sc lsCXsUXskEXx 


De WER YG TR 


sETsbAT sPROG 


CHEN te Pa WENO) 


PUNCH 922 s2 Var leor ils VERT oCTik 


PUNCH7 »PROB 

PUNCH? sPROB 

PUNCH 9000 

FORMAT (//) 
GT=Ahfad Ch +D7T +E T 
GTX=GT/AT 
CG=(AT*E1+0T*CX+CT 
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D2=Ve 

PL2=06 

PL3=06 

D3=U-6 
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FORTRAN LISTING 
D4=CG-EX 
D5=CG-BX 
D1l=CG-E1 


TL=D1*D1*AT 


-T2=D2*D2*BT 


T3=D3*D3*CT 
T4=D4*D4*DT 
T5=D5*D5*ET 
T=T1itT2+7T34+7T4+T5 
SP=SPIT*AT 
PDL=ZV*SP/GT 
PIM=ZV*SP¥ECC/T 
PL1=PDL+PIM*D1 
PEEK) 98015810,811 
PL2=PDL+PIM*D2 

IF (DX) 61258103812 
PL3=PDL+PIM*D3 
IFAEXI> 81358105813 
PL4=PDL+PIM*D4 
PL5=PDL+PIM*D5 
PLMAX=PL1*SQRT(1le+VERT#VERT) /VERT 


LF uPLMAAR PLO) Fe On TOW eof OT 


PLMAX=PL5 


ZZA=1-/VERT 


HF L=HF1*SP 


XYZ=POLL*GT+PLI*ZZA*AT 
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FORTRAN LISTING 
233 XYZ=XYZ+PL2¥ZZA*BT 
pee T0232 | 
234 1FIBAT—4e) 23552369238: 
235 XYZ=XYZ4PL3¥ZZACT 
G0, 100233 
236 XYZ=XYZ+PL4¥ZZA*DT 
GO TO 235 
232 PUNCH 9 
9FORMAT (47H MAXeVERTICAL PILE LOAD INs5H KIPS) 
PUNCH 1 | . 
LFORMAT(47H  PMAX ROW 1 ° ROW 2 ROW 3. ROW 4+5X»s5HROW 5) 
PUNCH8 »PLMAX »PL1»PL29PL3sPL45PL5 | 
SFORMAT (FT «2 1 oRIOe 2) 
PUNCH 9000 
) PUNCH 10 | 
POPORMAT (3 THHORsRESISTs EXTsHORIZ>. CeGs bGce) 
PUNCH 11 | 
L1FORMAT(32HPILE GROUP FORCE.» PILE GROUP) 
PUNCH 12 
12FORMAT(37H KIPS BRT poe FEET FEET) 
Be PUNCH) 13 +XY Zone Is cGsECC 
PEFORMATIFS. 256120206902 sF 963) 
PUNCH 9000 
) 7 FORMAT (8F 10.3} 
LF(CTR) 1000221000 
| 1000 READT>ZdoZV9HF1 


CTR=CTR-1l. 
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INPUT IDENTIFICATION 


CaraNo. 1 
Symbol Field Explanation 
AT NKR KK No. Piles - Row 1 
BT rN No: Piles - Row 2 
‘OWk co No. Piles - Row 3 
DT KOK KIIC KOCK No. Piles ~ Row L 
ET on ee No. Piles - Row 5 
BAT AXXKNK XXX Now oli hows lor Batter Tiles 
PROB XXXXKX KX Problem Identification No. 
Card No. 2 
El SEKKKX. MXE Toe to C.L. Row 1 (Feet) 
Gx | XXXXXX «XXX Toe! Go: Owl, how 2 (Pest) 
Dx XXXXXX «XXX Toeste Cab. Row 3. (Feet) 
EX XXXXXX. XXX Toe to C.L. Row 4 (Feet) 
BX XXXXKX « XXX - “Posetoueshs Row.5 (Feet) 
E2 Ke EX Heel to C.L. Row 5 (Feet) 
PoLL XXAXXX XXX Allow. Horiz,. Load. per 


Pile (Kips) 


44102 





INPUT IDENTIFICATION 


Card No. 3 
symbol Field 
ZJ Ae KKK 
ZV DRA MMe 
HFL LOOK ROX 
os LT XXXXXX «XXX 
VERT XXXXXX XXX 
CTR XXKKK « XXX 
Card No. & 
ad REAKKK 6 XX 
ZV Sees 
HF1 SUNK oe 


Explanation 


Moment per foot about Toe 
(Ft=Kips) 


Total Vertical Force per 
Foot (Kips) 


Total Horizontal Force Per 
Foot (Kips) 


Spacing Between Piles - 
Row 1 (Feet) 


Vertical Component of 
Batter Pile Relative to 1 


No. of Cards after Card 
Ni wR 


Moment per foot about toe 
(FT-Kips) 


Total Vertical Force per 
Foot (Kips) 


Total Horizontal Force 
per Foot (Kips) 


Cards No. 5, 6, 7 etc. have the same input description as Card No. hl. 
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SAMPLE PROBLEM-OUTPUT 


C SAMPLE OUTPUT 
C 
a 
111.000 
rl be We 
Zo U0 1.000 2 V00 e000 1.000 
ree 4.920 s000 0000 PaO 
126.380 2h ec2 0 12950 a AG 3.600 
P11,900 
Ti1,0v0 
MAXeVERTICAL PILE LOAD IN KIPS 
PMAX ROW 1 ROW 2 ROW 3 ROW 4 
52052 49.83 TRE © 00 400 
HOiermeolST<« EXTsHORIZ. Gis ECG. 
PILE GROUP FORCE PILE GROUP 
KIPS KIPS FEET PEE. 
80.28 S2540 Weed 486 
141,900 


220000 
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20000 


ROW 5 
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135.2000 ZUewvY 
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PMAX ROW 1 
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82.33 600g 
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150,000 35.000 
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111.000 
it, 300 
MAXeVERTICAL PILE LOAD IN KIPS 
PMAX ROW 1 ROW 2 ROW 3 ROW 4 ROW 5 
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SEQUENCE OF OPERATIONS 








* Keypunch & 
Verify Cards 





1620 Computer | 


bist on. 407 






Data Returned | 
To Bridge Dept. 


I. 


* Card Handling, key punch and computer instructions are 


available. 


Sareae 





e%s Bnoisoytsans wesnqu ith ms 





rw 


ouor ta BIO 30. aD 


f 
A 
F q 
’, ™ 
} Veo 
4 
¢ eViwitya Nechdrciabalilteaelising 
7 ee 
a feng yg P| 
; Tics 
’ 
: 
; ' 
bs v 
i cere 
y "a = ae | 
; = ETE 
| 
i 
i 
. 
7 A 
yy t - ad 
< 
: 
\ Col 
ow , 
. 
- 
: 
a 
J . pe 
' 
5 + 


. é q 

- ; 
ttn 

2 


7 ' 
MECRINGNOS EI. Be. von! Mi 


[ Th 
bemsgen aga 
Ir qs | ro Bor Th ¢ T | 


we: Com Seemed sat $s aty sete e mb 


Page eid 





eee 


aueae e et 










a 


eet 6 


a Bis Raat 
sae one Ban {. 
“y mi yx ‘ 
, 4 A . 
“i a8 7 
' ‘ a Se 
} re 
ee ADs 
i vy 
( 





00300 


IANA 


LRI 


